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"BOSS" AN INVISIBLE EXECUTIVE PROGRAM 
FOR THE PDP-8 DISC MONITOR SYSTEM 


DECUS Program Library Write-up DECUS No. 8-200 

GENERAL DESCRIPTION 

"BOSS" is available in two versions for the disc and DECtape systems. The disc version is 
the only version presently distributed, as the DECtape version has not been fully tested. 
Anyone interested in attempting the DECtape version should contact the author at the 
University of Alberta. Disc BOSS is a two-page program while DECtape BOSS occupies 
three pages. BOSS functions by interrogating the user to obtain a list of the programs that 
the user requires. Using this information and other information obtained by inspecting the 
system directory blocks and storage allocation maps, a "BOSS-HEAD" is constructed and 
placed in the top page of core starting at 7600. BOSS-HEAD is entered at the completion 
of each program either by the program jumping to 7600, as it would normally exit to monitor, 
or by the user stopping his program and loading 7600 and starting. BOSS-HEAD then calls 
BOSS from the device and provides it with the directory number of the next program in the 
list. BOSS calls in the directory from the system device, locates the file, and after calling 
in MONITOR gives the name of the program to the first page of GET. GET then loads 
the file into core and starts it at the correct location. At the end of a list, BOSS rings the 
bell and waits for the users reply through the keyboard. CONTROL-C causes BOSS to boot¬ 
strap MONITOR HEAD back into the top page of core and enter MONITOR HEAD. A 
different character causes BOSS to restart the list of programs at the beginning again. 

INITIALIZING THE BOSS SYSTEM 

Select the binary tape suitable for the device to be used and load into core using the system 
load program with one pass and return to MONITOR. 

.LOAD 

IN-T: 

OPT-1 

ST=7600 ETC. 

BOSS should now be saved on the system device as a system file. (Note that BOSS should 
be saved before being used.) 

.SAVE BOSS! 200-577;400 (DECTAPE: SAVE BOSS! 200-777;400) 

BOSS may now be used when desired by calling in the usual manner 

.BOSS 

IN-S:NAME,S:NAMF,S:NAMG-(CARRIAGE RETURN) 

BOSS requests the list of programs to be used and will accept up to nine system files as 
acceptable input. File names to be used must start with a letter. BOSS will now run as 
previously described for as many cycles as are required by the user. 







If it is desired to return to MONITOR at some other time than the end of a set of programs, 
or if a fault occurs, MONITOR may be reobtained and the MONITOR HEAD replaced by 
entering the BOSS bootstrap routine directly. This is achieved by loading 7606 and starting 
the computer. Since BOSS never writes on the system device while in use, the device 
protection circuits may be used throughout a series of programs. Note that when saving 
BOSS it must be saved as a system program and the name BOSS must be used. 


Note : Location 234 contains the code 6346 which is an AXJ08 instruction (clear the enable 
register). If different peripheral equipment is being used, this instruction may be changed 
to whatever is suitable. 
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CORE USED DURING OPERATION OF "BOSS" 


SYS -I/O 

7642 

7600 

SYS-I/O 

7642 

7600 

SYS-I/O 

7642 

SYS-I/O 

MUN-HEAJJ 

MON-HEAD 

MON-HEAD 

BOSS-HEAd 




7600 




.CD. 







.CD. 


DN 

3000 




.CD. 


+SAMS 




.CD. 

3000 






.CD. 






LIST 

2000 










BOSS 

200 

BOSS 

200 

BOSS 

200 



.CD. 
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BUILD 
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SYS-I/O 

7642 

7600 

7200 

SYS-I/O 

7642 
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SYS-I/O 

BOSS-HD 

BOSS-HD 

BOSS-HD 
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MONITOR 
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1000 
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DCEA = 661 1 

DMAR=6603 

DFSC=6622 
. ZTEN=6342 

0TEN=6344 

FIXTAB 

/ "BOSS'* AN EX 

*200 

0200 

6032 

BOSHED# KCC /BOSS 

0201 

4210 

JMS BLK GET 

0202 

0000 

BSSBLK# 0 

0203 

0200 

200 

0204 

560 5 

JMP I CHEIF 

020 5 

0231 

CHEI F# MAIN 

0206 

220 5 

FAIL# ISZ CHEIF 

020 7 

5200 

JMP BOSHED 

0210 

0000 

BLK GET# 0 

021 1 

1 610 

TAD I BLKGET 

0212 

2210 

ISZ BLKGET 

0213 

3221 

DCA BLOC 

0214 

1610 

TAD I BLKGET 

021 5 

2210 

ISZ BLKGET 

0216 

3222 

DCA CORE 

021 7 

4626 

JMS I SYSIO 

0220 

0003 

FUNCTN, 3 

0221 

0000 

BLOC# 0 

0222 

0000 

CORE# 0 

0223 

0000 

LINK, 0 

0224 

5206 

JMP FAIL 

022 5 

5610 

JMP I BLKGET 

0226 

7642 

SYSIO# 7642 

022 7 

7630 

POINT# LIST+7400 

0230 

7630 

LIST+7400 

0231 

5233 

MAIN# JMP .+2 

0232 

5335 

JMP BOOT 

0233 

6002 

IOF 

0234 

6346 

ZTEN OTEN 

023 5 

4210 

JMS BLKGET 

0236 

0010 

10 

023 7 

7200 

7200 


EXECUTIVE PROGRAM.A.S.FRENCH.CAPRIL-69) 
-HEAD START. 


0240 

4210 

DNGET# JMS BLKGET 

0241 

0202 

202 

0242 

1 1 75 

1175 

0243 

4210 

JMS BLKGET 

0244 

0201 

201 

02^5 

1000 

1000 

0246 

4210 

JMS BLKGET 

024 7 

01 77 

1 77 

0250 

0603 

603 

0251 

1 777 

TAD I (7627 

0232 

322 7 

v DCA POINT 

0253 

2777 

ISZ I <762 7 

0254 

162 7 

TAD I POINT 

0255 

7450 

SNA 

0256 

5347 

JMP CYCLE 

0257 

7041 

CIA 

0260 

3240 

DCA DNGET 

0261 

1376 

TAD C 5 

0262 

2240 

ISZ DNGET 

0263 

5261 

JMP .-2 

0264 

12'; 7 

TAD DCORE 

0265 

3010, 

OCA 10 
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0266 

1 410 


TAD I 10 

0267 

7500 


SMA 

0270 

5335 


JMP BOOT 

02 71 

.3775 


DCA I (7201 

02 72 

1 410 


TAD I 10 

02 73 

3 7 74 


DCA I (7202 

02 74 

5773 


JMP I (7210 

0275 

7600 

MONITR* 

7600 

0276 

0230 

ARROW* 

LIST 

02 77 

0 600 

DCORE* 

600 

0300 

7240 

MOVIE* 

CLA CMA 

0301 

13 72 


TAD (2000 

0302 

3010 


DCA 10 

0303 

1 410 

LOOP* 

TAD I 10 

030 4 

7001 


I AC 

030 5 

7450 


SNA 

0306 

5314 


JMP END 

030 7 

1371 


TAD (-6001 

0310 

3676 


DCA I ARROW 

031 1 

2276 


ISZ ARROW 

0312 

3410 


DCA I 10 

0313 

5303 


JMP LOOP 

0314 

3676 

END* 

DCA I ARROW 

031 5 

4770 

SEARCH* 

JMS DNSRCH 

0316 

4257 


4257 

031 7 

6363 


6363 

0320 

3202 


DCA BSSBL.K 

0321 

7240 


CLA CMA 

0322 

1275 


TAD MONITR 

0323 

3010 


DCA 10 

0324 

1 334 


TAD HEAD 

032 5 

30 1' 1 


DCA 1 1 

032 6 

141 1 


TAD I 11 

032 7 

3^10 


DCA I 10 

0330 

2333 

- 

ISZ KNTR2 

0331 

532 6 


JMP .-3 

0332 

5675 


JMP I MONITR 


0333 7736 KNTR2* -42 


0334 

01 77 

033 5 

60 32 

0336 

1 367 

033 7 

3766 

0340 

1367 

0341 

3765 

0342 

661 1 

0343 

6603 

0344 

6622 

0345 

5344 

0346 

5675 

0347 

6032 

03 50 

1364 

0351 

6046 

0352 

60 31 

0353 

5352 

0354 

6036 

0355 

1 363 

0356 

7650 

0357 

5335 

0360 

1230 

0361 

3777 

0362 

5231 


HEAD* BOSHED -1 ' 

BOOT* KCC 

TAD (-202 
DGA I ( 77 50 
TAD (-202 
DCA I ( 7751 
DCEA 
DMAR 
DFSC 
JMP .-i 
JMP I MONITR 
CYCLE* KCC 

TAD (207 
TLS 

READ* KSF 

JMP .-1 
KRB 

TAD (-203 
SNA CLA 
JMP BOOT 
TAD POINT +1 
DCA I (7627 
JMP MAIN 





0363 

7575 




0364 

020 7 


' 


0365 

7751 


* 


0366 

7750 




0367 

7576 




0370 

041 7 




0371 

1 777 




0372 

2000 




0373 

7210 




0374 

7202 




0375 

7201 




0376 

000 5 




0377 

762 7 




0400 

1377 


PAGEBUILD* 

0401 

3350 


DCA 

DNLINK 

0402 

1350 


TAD 

DNLINK, 

0403 

31 72 


DCA 

1 72 

0404 

1376 


TAD 

( 7530 

040 5 

31 75 


DCA 

1 75 

040 6 

1375 


TAD 

(2000 

040 7 

31 74 


DCA 

1 74 

0410 

7040 


CMA 


041 1 

3167 


DCA 

167 

0412 

1216 


TAD 

RETURN 

0413 

31 77 


DCA 

1 77 

041 4 

433 7 


JMS 

DNBLKI 

0415 

5774 


JMP 

I (3001 

0416 

0300 

RETURN* 

MOVE 

041 7 

0000 

DNSRCH* 

0 


0420 

161 7 


TAD 

I DNSRCH 

0421 

3365 


DCA 

DNT1 

0422 

221 7 


ISZ 

DNSRCH 

0423 

1 61 7 


TAD 

I DNSRCH 

0424 

3366 


DCA 

DNT2 

042 5 

2217 


ISZ 

DNSRCH 

0426 

3364 


DCA 

DNSAMC 

042 7 

1354 


TAD 

DNSTRT 

0430 

3350 


DCA 

DNL.I NK 

0431 

4337 

DNINP 1 , 

JMS 

DNBLKI 

0432 

1355 


TAD 

DNKT 

0433 

3363 


DCA 

DNKTR 

0434 

1345 


TAD 

DNFUNC 


0435 

0436 

043 7 

0440 

0441 

0442 

0443 

0444 

0445 

0446 

044 7 

0450 

0451 

0452 

0453 

0454 

0455 

0456 

0457 

0460 


1 347 
3367 
1 767 
2367 
2364 
7041 

1365 
7640 
52 53 
1 76 7 
7041 

1366 
7650 
5262 
1345 
7001 
1 367 
3367 
2363 
^237 


DNTEST. 


DNNOTF, 


TAD 
DC A 
TAD 
I SZ 
ISZ 
CIA 
TAD 
SZA 
JMP 
TAD 
CIA 
TAD 
SNA 
JMP 
TAD 
I AC 

TAD DNT3 
DCA DNT3 
ISZ DNKTR 
JMP DNTEST 


DNCORE 
DNT3 
I DNT3 
DNT3 
DNSAMC 

DNT1 

CLA 

DNNOTF. 
I DNT3 

DNT2 

CLA 

DNFIND 

DNFUNC 



TAD (15 


/DNSRCH-DIRECTORY SEARCH 
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0461 

5231 


JMP 

DNINP1 

0462 

1345 

DNFIND, 

TAD 

DNFUNC 

0463 

1367 


TAD 

DNT3 

0464 

3367 


DCA 

DNT3 

0465 

1767 


TAD 

I DNT3 

0466 

7044 


CMA 

RAL 

046 7 

7730 


SPA 

SZL CLA 

0470 

. 5254 


JMP 

DNNOTF+1 

0471 

1356 


TAD 

DN200 

0472 

3350 


DCA 

DNLINK 

0473 

1364 


TAD 

DNSAMC 

0474 

7041 


CIA 


0475 

3364 


DCA 

DNSAMC 

0476 

3366 


DCA 

DNT2 

0477 

1364 

DNINP2> 

TAD 

DNSAMC 

0500 

3365 


DCA 

DNT1 

0501 

4337 


JMS 

DNBLKI 

0502 

1 361 


TAD 

DNM2 

0503 

3367 


DCA 

DNT3 

0504 

1360 


TAD 

DN7 7 

.0505 

3346 

DNPASS* 

DCA 

DNBLOK 

0506 

1362 


TAD 

DNM200 

050 7 

3363 


DCA 

DNKTR 

0510 

1 347 


TAD 

DNCORE 

051 I 

3337 


DCA 

DNBLKI 

0512 

1 737 

DNLOOP* 

TAD 

I DNBLKI 

0513 

0346 


AND 

DNBLOK 

0514 

1365 


TAD 

DNT1 

051 5 

7650 


SNA 

CLA 

0516 

5335 


JMP 

DNSMFD 

051 7 

2337 


ISZ 

DNBLKI 

0520 

2366 


ISZ 

DNT2 

0521 

2363 


ISZ 

DNKTR 

0522 

53,12 


JMP 

DNLOOP 

0523 

1365 

. 

TAD 

DNT1 

0524 

7006 


RTL 


052 5 

7006 


RTL 


0526 

7006 


RTL 


052 7 

0357 


AND 

DN7700 

0530 

3365 


DCA 

DNT1 

0531 

1357 


TAD 

DN7700 

0532 

2367 


ISZ 

DNT3 

0533 

530 5 


JMP 

DNPASS 

0534 

5277 


JMP 

DNINP2 

0535 

1366 

DNSMFD* 

TAD 

DNT2 

0536 

561 7 

, 

JMP 

I DNSRCH 

0537 

0000 

DNBLKI, 

0 


0540 

1350 


TAD 

DNLINK 

0541 

7450 


SNA 


0542 

5773 


JMP 

BOOT 

0543 

3346 


DCA 

DNBLOK 

0544 

4753 


JMS 

I SYSTIO 

0545 

0003 

DNFUNC, 

3 

0546 

0000 

DNBLOK , 

0 


0547 

3000 

DNCORE, 

DNBUFF 

0550 

0000 

DNLINK , 

0 


0551 

5773 


JMP 

BOOT* 

0552 

5737 


JMP 

I DNBLKI 

0553 

'7642 

SYSTIO, 

7642 

0554 

0177 

.DNSTRT, 

1 77 


0555 

7747 

DNKT, 

“31 


0556 

0200 . 

DN200 , 

200 







0557 7700 

0560 0077 

0561 7776 

0562 7600 

0563 0000 

05*4 0000 

0565 0000 

0566 0000 

0567 0000 


0573 0335 

0574 3001 

0575 2000 

0576 7530 

0577 0015 


DN7700, 7700 
DN77> 77 

DNM2* -2 
DNM200> -200 
DNKTR* 0 
DNSAMC> 0 
DNT1 » 0 

DNT2* 0 
DNT3* 0 
DNBUFF=3000 

l.ist=point+i 


? 
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